home *** CD-ROM | disk | FTP | other *** search
/ Hairs 2 / Hairs 2.iso / mac / MAC / SHARED.DIR / 00145_Script_145 < prev    next >
Text File  |  1995-07-25  |  1KB  |  28 lines
  1. on pushButtonMove
  2.  
  3.     -- ﾇｱﾇﾃ蔔êîﾇﾕﾉ{ﾉ^ﾉìﾉXﾉvﾉ篷Cﾉgﾇ昶üﾇｵﾇ©ﾇﾐﾇｴﾇ⒣Eﾅ^竓ﾇ…ﾇｪﾇﾍﾇｺﾇﾍ2pixelﾇﾞﾇｬ紆ﾇｵ竓ﾇ隻局ﾝﾅB
  4.     -- ﾉ}ﾉEﾉXﾉJﾅ[ﾉ¥ﾉ翩卷{ﾉ^ﾉìﾇｩﾇﾁó｣ﾇﾍﾇﾈﾇﾐñîﾇ‡ﾇﾐﾇ⒲ﾇﾋﾇ局ﾝﾅB
  5.     -- ﾇｪﾇﾃ鵆ﾉ{ﾉ^ﾉì閼ﾇｼﾇﾕﾇｻﾇ蕊ﾍﾇ©ﾇｫﾇｧﾇｩﾇ數uﾅ[ﾉ肬lﾇｼï舵ｵﾇ局ﾝﾅB
  6.  
  7.     put (the locV of sprite clickon()) + 2 into dV
  8.     put (the locH of sprite clickon()) + 2 into dH
  9.     set the locV of sprite clickOn() = dV
  10.     set the locH of sprite clickOn() = dH
  11.     upDateStage
  12.     repeat while stillDown()
  13.         if rollOver(clickOn()) or ｬ
  14.                        ((mouseV() >= (dv - 2) and mouseH() >= (dH - 2)) and (mouseV() <= the bottom of sprite clickOn() and ｬ
  15.                          mouseH() <= the right of sprite clickOn())) then 
  16.             set the locV of sprite clickOn() = dV
  17.             set the locH of sprite clickOn() = dH
  18.         else
  19.             set the locV of sprite clickOn() = dV - 2
  20.             set the locH of sprite clickOn() = dH - 2
  21.         end if
  22.         upDateStage
  23.     end repeat
  24.     put rollOver(clickOn()) into R
  25.     set the locV of sprite clickOn() = dV - 2
  26.     set the locH of sprite clickOn() = dH - 2
  27.     upDateStage
  28.     return R